/ Developer CD Series 1996 June: Reference Library / Dev.CD Jun 96 RL / Dev.CD Jun 96 RL.toast / Technical Documentation / develop / develop Issue 6 / develop Issue 6 code / TCP.sea / TCP / NewsWatcher / NW Source / Source / ldef.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 06 6c 64 65 66 2e 63 | 00 00 00 00 00 00 00 00 |..ldef.c|........|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 4d 43 | 43 01 00 00 00 00 00 00 |.TEXTMMC|C.......|
|00000050| 00 00 00 00 00 27 73 00 | 00 01 9a ab 32 32 45 ab |.....'s.|....22E.|
|00000060| 32 32 45 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |22E.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 90 59 00 00 |........|.....Y..|
|00000080| 2f 2a 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |/*------|--------|
|00000090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000000c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 0d 0d |--------|------..|
|000000d0| 09 6c 64 65 66 2e 63 0d | 0d 09 54 68 69 73 20 6d |.ldef.c.|..This m|
|000000e0| 6f 64 75 6c 65 20 63 6f | 6e 74 61 69 6e 73 20 74 |odule co|ntains t|
|000000f0| 68 65 20 4c 44 45 46 20 | 66 6f 72 20 4e 65 77 73 |he LDEF |for News|
|00000100| 57 61 74 63 68 65 72 2e | 0d 09 0d 09 43 6f 70 79 |Watcher.|....Copy|
|00000110| 72 69 67 68 74 20 a9 20 | 31 39 39 34 2d 31 39 39 |right . |1994-199|
|00000120| 35 2c 20 4e 6f 72 74 68 | 77 65 73 74 65 72 6e 20 |5, North|western |
|00000130| 55 6e 69 76 65 72 73 69 | 74 79 2e 0d 0d 2d 2d 2d |Universi|ty...---|
|00000140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000150| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000180| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2a 2f 0d 0d 23 69 6e |--------|-*/..#in|
|00000190| 63 6c 75 64 65 20 3c 73 | 74 72 69 6e 67 2e 68 3e |clude <s|tring.h>|
|000001a0| 0d 0d 23 69 6e 63 6c 75 | 64 65 20 22 67 6c 6f 62 |..#inclu|de "glob|
|000001b0| 2e 68 22 0d 23 69 6e 63 | 6c 75 64 65 20 22 6c 64 |.h".#inc|lude "ld|
|000001c0| 65 66 2e 68 22 0d 23 69 | 6e 63 6c 75 64 65 20 22 |ef.h".#i|nclude "|
|000001d0| 68 65 61 64 65 72 2e 68 | 22 0d 23 69 6e 63 6c 75 |header.h|".#inclu|
|000001e0| 64 65 20 22 64 72 61 77 | 75 74 69 6c 2e 68 22 0d |de "draw|util.h".|
|000001f0| 23 69 6e 63 6c 75 64 65 | 20 22 77 69 6e 64 75 74 |#include| "windut|
|00000200| 69 6c 2e 68 22 0d 23 69 | 6e 63 6c 75 64 65 20 22 |il.h".#i|nclude "|
|00000210| 6d 65 6d 75 74 69 6c 2e | 68 22 0d 0d 73 74 61 74 |memutil.|h"..stat|
|00000220| 69 63 20 52 47 42 43 6f | 6c 6f 72 20 67 4c 69 67 |ic RGBCo|lor gLig|
|00000230| 68 74 42 6c 75 65 20 3d | 20 7b 30 78 39 39 39 39 |htBlue =| {0x9999|
|00000240| 2c 20 30 78 39 39 39 39 | 2c 20 30 78 46 46 46 46 |, 0x9999|, 0xFFFF|
|00000250| 7d 3b 09 2f 2a 20 6c 69 | 67 68 74 20 62 6c 75 65 |};./* li|ght blue|
|00000260| 20 66 6f 72 20 66 69 6c | 6c 69 6e 67 20 74 72 69 | for fil|ling tri|
|00000270| 61 6e 67 6c 65 73 20 2a | 2f 0d 0d 73 74 61 74 69 |angles *|/..stati|
|00000280| 63 20 52 65 63 74 20 67 | 52 65 63 74 3b 09 09 09 |c Rect g|Rect;...|
|00000290| 09 09 2f 2a 20 63 65 6c | 6c 20 72 65 63 74 20 2a |../* cel|l rect *|
|000002a0| 2f 0d 73 74 61 74 69 63 | 20 46 6f 6e 74 49 6e 66 |/.static| FontInf|
|000002b0| 6f 20 67 46 6f 6e 74 49 | 6e 66 6f 3b 09 09 09 2f |o gFontI|nfo;.../|
|000002c0| 2a 20 66 6f 6e 74 20 69 | 6e 66 6f 72 6d 61 74 69 |* font i|nformati|
|000002d0| 6f 6e 20 2a 2f 0d 73 74 | 61 74 69 63 20 54 57 69 |on */.st|atic TWi|
|000002e0| 6e 64 6f 77 20 2a 2a 67 | 49 6e 66 6f 3b 09 09 09 |ndow **g|Info;...|
|000002f0| 09 2f 2a 20 77 69 6e 64 | 6f 77 20 69 6e 66 6f 72 |./* wind|ow infor|
|00000300| 6d 61 74 69 6f 6e 20 2a | 2f 0d 73 74 61 74 69 63 |mation *|/.static|
|00000310| 20 73 68 6f 72 74 20 67 | 49 6e 64 65 78 3b 09 09 | short g|Index;..|
|00000320| 09 09 2f 2a 20 69 6e 64 | 65 78 20 69 6e 20 67 72 |../* ind|ex in gr|
|00000330| 6f 75 70 20 6f 72 20 73 | 75 62 6a 65 63 74 20 61 |oup or s|ubject a|
|00000340| 72 72 61 79 20 2a 2f 0d | 73 74 61 74 69 63 20 48 |rray */.|static H|
|00000350| 61 6e 64 6c 65 20 67 53 | 74 72 69 6e 67 73 3b 09 |andle gS|trings;.|
|00000360| 09 09 09 2f 2a 20 68 61 | 6e 64 6c 65 20 74 6f 20 |.../* ha|ndle to |
|00000370| 73 74 72 69 6e 67 73 20 | 2a 2f 0d 73 74 61 74 69 |strings |*/.stati|
|00000380| 63 20 73 68 6f 72 74 20 | 67 48 2c 20 67 56 3b 09 |c short |gH, gV;.|
|00000390| 09 09 09 2f 2a 20 68 20 | 61 6e 64 20 76 20 63 6f |.../* h |and v co|
|000003a0| 6f 72 64 73 20 66 6f 72 | 20 64 72 61 77 69 6e 67 |ords for| drawing|
|000003b0| 20 2a 2f 0d 73 74 61 74 | 69 63 20 52 65 63 74 20 | */.stat|ic Rect |
|000003c0| 67 45 72 61 73 65 52 65 | 63 74 3b 09 09 09 09 2f |gEraseRe|ct;..../|
|000003d0| 2a 20 72 65 63 74 61 6e | 67 6c 65 20 65 72 61 73 |* rectan|gle eras|
|000003e0| 65 64 20 61 6e 64 20 72 | 65 64 72 61 77 6e 20 2a |ed and r|edrawn *|
|000003f0| 2f 0d 73 74 61 74 69 63 | 20 54 53 75 62 6a 65 63 |/.static| TSubjec|
|00000400| 74 20 2a 2a 67 53 75 62 | 6a 65 63 74 41 72 72 61 |t **gSub|jectArra|
|00000410| 79 3b 20 09 2f 2a 20 68 | 61 6e 64 6c 65 20 74 6f |y; ./* h|andle to|
|00000420| 20 73 75 62 6a 65 63 74 | 20 61 72 72 61 79 20 2a | subject| array *|
|00000430| 2f 0d 73 74 61 74 69 63 | 20 54 53 75 62 6a 65 63 |/.static| TSubjec|
|00000440| 74 20 67 54 68 65 53 75 | 62 6a 65 63 74 3b 09 09 |t gTheSu|bject;..|
|00000450| 2f 2a 20 73 75 62 6a 65 | 63 74 20 72 65 63 6f 72 |/* subje|ct recor|
|00000460| 64 20 74 6f 20 62 65 20 | 64 72 61 77 6e 20 2a 2f |d to be |drawn */|
|00000470| 0d 73 74 61 74 69 63 20 | 73 68 6f 72 74 20 67 52 |.static |short gR|
|00000480| 6f 77 3b 09 09 09 09 09 | 2f 2a 20 72 6f 77 20 6e |ow;.....|/* row n|
|00000490| 75 6d 62 65 72 20 6f 66 | 20 63 65 6c 6c 20 62 65 |umber of| cell be|
|000004a0| 69 6e 67 20 64 72 61 77 | 6e 20 2a 2f 0d 73 74 61 |ing draw|n */.sta|
|000004b0| 74 69 63 20 4c 69 73 74 | 48 61 6e 64 6c 65 20 67 |tic List|Handle g|
|000004c0| 54 68 65 4c 69 73 74 3b | 09 09 09 2f 2a 20 68 61 |TheList;|.../* ha|
|000004d0| 6e 64 6c 65 20 74 6f 20 | 6c 69 73 74 20 72 65 63 |ndle to |list rec|
|000004e0| 6f 72 64 20 2a 2f 0d 73 | 74 61 74 69 63 20 73 68 |ord */.s|tatic sh|
|000004f0| 6f 72 74 20 67 52 69 67 | 68 74 45 64 67 65 3b 09 |ort gRig|htEdge;.|
|00000500| 09 09 2f 2a 20 72 69 67 | 68 74 20 63 65 6c 6c 20 |../* rig|ht cell |
|00000510| 65 64 67 65 20 6d 69 6e | 75 73 20 69 6e 64 65 6e |edge min|us inden|
|00000520| 74 61 74 69 6f 6e 20 2a | 2f 0d 0d 0d 0d 2f 2a 20 |tation *|/..../* |
|00000530| 54 68 65 20 66 6f 6c 6c | 6f 77 69 6e 67 20 67 6c |The foll|owing gl|
|00000540| 6f 62 61 6c 20 76 61 72 | 69 61 62 6c 65 20 69 73 |obal var|iable is|
|00000550| 20 65 78 70 6f 72 74 65 | 64 2e 20 2a 2f 0d 0d 4c | exporte|d. */..L|
|00000560| 69 73 74 44 65 66 55 50 | 50 20 67 4c 69 73 74 44 |istDefUP|P gListD|
|00000570| 65 66 46 75 6e 63 55 50 | 50 20 3d 20 6e 69 6c 3b |efFuncUP|P = nil;|
|00000580| 0d 0d 0d 0d 2f 2a 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..../*--|--------|
|00000590| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000005d0| 2d 2d 0d 09 44 72 61 77 | 46 75 6c 6c 4f 72 4e 65 |--..Draw|FullOrNe|
|000005e0| 77 47 72 6f 75 70 43 65 | 6c 6c 0d 09 0d 09 44 72 |wGroupCe|ll....Dr|
|000005f0| 61 77 20 61 20 73 69 6e | 67 6c 65 20 63 65 6c 6c |aw a sin|gle cell|
|00000600| 20 69 6e 20 74 68 65 20 | 66 75 6c 6c 20 67 72 6f | in the |full gro|
|00000610| 75 70 20 6c 69 73 74 20 | 77 69 6e 64 6f 77 20 6f |up list |window o|
|00000620| 72 20 74 68 65 20 6e 65 | 77 20 67 72 6f 75 70 73 |r the ne|w groups|
|00000630| 0d 09 6c 69 73 74 20 77 | 69 6e 64 6f 77 2e 0d 2d |..list w|indow..-|
|00000640| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000650| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000660| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000670| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000680| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2a 2f 0d 0d 73 |--------|---*/..s|
|00000690| 74 61 74 69 63 20 76 6f | 69 64 20 44 72 61 77 46 |tatic vo|id DrawF|
|000006a0| 75 6c 6c 4f 72 4e 65 77 | 47 72 6f 75 70 43 65 6c |ullOrNew|GroupCel|
|000006b0| 6c 20 28 76 6f 69 64 29 | 0d 7b 09 09 09 0d 09 54 |l (void)|.{.....T|
|000006c0| 47 72 6f 75 70 20 2a 2a | 67 72 6f 75 70 41 72 72 |Group **|groupArr|
|000006d0| 61 79 3b 0d 09 53 74 72 | 32 35 35 20 73 74 72 3b |ay;..Str|255 str;|
|000006e0| 0d 09 0d 09 67 72 6f 75 | 70 41 72 72 61 79 20 3d |....grou|pArray =|
|000006f0| 20 28 2a 2a 67 49 6e 66 | 6f 29 2e 67 72 6f 75 70 | (**gInf|o).group|
|00000700| 41 72 72 61 79 3b 0d 09 | 67 45 72 61 73 65 52 65 |Array;..|gEraseRe|
|00000710| 63 74 20 3d 20 67 52 65 | 63 74 3b 0d 09 45 72 61 |ct = gRe|ct;..Era|
|00000720| 73 65 52 65 63 74 28 26 | 67 45 72 61 73 65 52 65 |seRect(&|gEraseRe|
|00000730| 63 74 29 3b 0d 09 73 74 | 72 63 70 79 28 28 63 68 |ct);..st|rcpy((ch|
|00000740| 61 72 2a 29 73 74 72 2c | 20 2a 67 53 74 72 69 6e |ar*)str,| *gStrin|
|00000750| 67 73 20 2b 20 28 2a 67 | 72 6f 75 70 41 72 72 61 |gs + (*g|roupArra|
|00000760| 79 29 5b 67 49 6e 64 65 | 78 5d 2e 6e 61 6d 65 4f |y)[gInde|x].nameO|
|00000770| 66 66 73 65 74 29 3b 0d | 09 63 32 70 73 74 72 28 |ffset);.|.c2pstr(|
|00000780| 28 63 68 61 72 2a 29 73 | 74 72 29 3b 0d 09 54 72 |(char*)s|tr);..Tr|
|00000790| 75 6e 63 53 74 72 69 6e | 67 28 67 52 69 67 68 74 |uncStrin|g(gRight|
|000007a0| 45 64 67 65 20 2d 20 67 | 48 2c 20 73 74 72 2c 20 |Edge - g|H, str, |
|000007b0| 73 6d 54 72 75 6e 63 45 | 6e 64 29 3b 0d 09 4d 6f |smTruncE|nd);..Mo|
|000007c0| 76 65 54 6f 28 67 48 2c | 20 67 56 29 3b 0d 09 44 |veTo(gH,| gV);..D|
|000007d0| 72 61 77 53 74 72 69 6e | 67 28 73 74 72 29 3b 0d |rawStrin|g(str);.|
|000007e0| 7d 0d 0d 0d 0d 2f 2a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..../*-|--------|
|000007f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000800| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000810| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000820| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000830| 2d 2d 2d 0d 09 44 72 61 | 77 55 73 65 72 47 72 6f |---..Dra|wUserGro|
|00000840| 75 70 43 65 6c 6c 0d 09 | 0d 09 44 72 61 77 20 61 |upCell..|..Draw a|
|00000850| 20 73 69 6e 67 6c 65 20 | 63 65 6c 6c 20 69 6e 20 | single |cell in |
|00000860| 61 20 75 73 65 72 20 67 | 72 6f 75 70 20 6c 69 73 |a user g|roup lis|
|00000870| 74 20 77 69 6e 64 6f 77 | 2e 0d 2d 2d 2d 2d 2d 2d |t window|..------|
|00000880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000008a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000008b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000008c0| 2d 2d 2d 2d 2d 2d 2a 2f | 0d 0d 73 74 61 74 69 63 |------*/|..static|
|000008d0| 20 76 6f 69 64 20 44 72 | 61 77 55 73 65 72 47 72 | void Dr|awUserGr|
|000008e0| 6f 75 70 43 65 6c 6c 20 | 28 76 6f 69 64 29 0d 7b |oupCell |(void).{|
|000008f0| 09 09 09 0d 09 54 47 72 | 6f 75 70 20 2a 2a 67 72 |.....TGr|oup **gr|
|00000900| 6f 75 70 41 72 72 61 79 | 2c 20 74 68 65 47 72 6f |oupArray|, theGro|
|00000910| 75 70 3b 0d 09 6c 6f 6e | 67 20 6e 75 6d 55 6e 72 |up;..lon|g numUnr|
|00000920| 65 61 64 3b 0d 09 53 74 | 72 32 35 35 20 73 74 72 |ead;..St|r255 str|
|00000930| 3b 0d 09 73 68 6f 72 74 | 20 68 3b 0d 0d 09 67 72 |;..short| h;...gr|
|00000940| 6f 75 70 41 72 72 61 79 | 20 3d 20 28 2a 2a 67 49 |oupArray| = (**gI|
|00000950| 6e 66 6f 29 2e 67 72 6f | 75 70 41 72 72 61 79 3b |nfo).gro|upArray;|
|00000960| 0d 09 74 68 65 47 72 6f | 75 70 20 3d 20 28 2a 67 |..theGro|up = (*g|
|00000970| 72 6f 75 70 41 72 72 61 | 79 29 5b 67 49 6e 64 65 |roupArra|y)[gInde|
|00000980| 78 5d 3b 0d 09 67 45 72 | 61 73 65 52 65 63 74 20 |x];..gEr|aseRect |
|00000990| 3d 20 67 52 65 63 74 3b | 0d 09 69 66 20 28 74 68 |= gRect;|..if (th|
|000009a0| 65 47 72 6f 75 70 2e 6f | 6e 6c 79 52 65 64 72 61 |eGroup.o|nlyRedra|
|000009b0| 77 43 6f 75 6e 74 29 20 | 67 45 72 61 73 65 52 65 |wCount) |gEraseRe|
|000009c0| 63 74 2e 72 69 67 68 74 | 20 3d 20 67 48 20 2b 20 |ct.right| = gH + |
|000009d0| 28 2a 2a 67 49 6e 66 6f | 29 2e 6e 75 6d 55 6e 72 |(**gInfo|).numUnr|
|000009e0| 65 61 64 48 43 6f 6f 72 | 64 3b 0d 09 45 72 61 73 |eadHCoor|d;..Eras|
|000009f0| 65 52 65 63 74 28 26 67 | 45 72 61 73 65 52 65 63 |eRect(&g|EraseRec|
|00000a00| 74 29 3b 0d 09 6e 75 6d | 55 6e 72 65 61 64 20 3d |t);..num|Unread =|
|00000a10| 20 74 68 65 47 72 6f 75 | 70 2e 6e 75 6d 55 6e 72 | theGrou|p.numUnr|
|00000a20| 65 61 64 3b 0d 09 69 66 | 20 28 6e 75 6d 55 6e 72 |ead;..if| (numUnr|
|00000a30| 65 61 64 20 21 3d 20 30 | 29 20 7b 0d 09 09 69 66 |ead != 0|) {...if|
|00000a40| 20 28 6e 75 6d 55 6e 72 | 65 61 64 20 3e 20 39 39 | (numUnr|ead > 99|
|00000a50| 39 39 29 20 6e 75 6d 55 | 6e 72 65 61 64 20 3d 20 |99) numU|nread = |
|00000a60| 39 39 39 39 3b 0d 09 09 | 4e 75 6d 54 6f 53 74 72 |9999;...|NumToStr|
|00000a70| 69 6e 67 28 6e 75 6d 55 | 6e 72 65 61 64 2c 20 73 |ing(numU|nread, s|
|00000a80| 74 72 29 3b 0d 09 09 4d | 6f 76 65 54 6f 28 67 48 |tr);...M|oveTo(gH|
|00000a90| 20 2b 20 28 2a 2a 67 49 | 6e 66 6f 29 2e 6e 75 6d | + (**gI|nfo).num|
|00000aa0| 55 6e 72 65 61 64 48 43 | 6f 6f 72 64 20 2d 20 53 |UnreadHC|oord - S|
|00000ab0| 74 72 69 6e 67 57 69 64 | 74 68 28 73 74 72 29 2c |tringWid|th(str),|
|00000ac0| 20 67 56 29 3b 0d 09 09 | 44 72 61 77 53 74 72 69 | gV);...|DrawStri|
|00000ad0| 6e 67 28 73 74 72 29 3b | 0d 09 7d 0d 09 69 66 20 |ng(str);|..}..if |
|00000ae0| 28 21 74 68 65 47 72 6f | 75 70 2e 6f 6e 6c 79 52 |(!theGro|up.onlyR|
|00000af0| 65 64 72 61 77 43 6f 75 | 6e 74 29 20 7b 0d 09 09 |edrawCou|nt) {...|
|00000b00| 73 74 72 63 70 79 28 28 | 63 68 61 72 2a 29 73 74 |strcpy((|char*)st|
|00000b10| 72 2c 20 2a 67 53 74 72 | 69 6e 67 73 20 2b 20 74 |r, *gStr|ings + t|
|00000b20| 68 65 47 72 6f 75 70 2e | 6e 61 6d 65 4f 66 66 73 |heGroup.|nameOffs|
|00000b30| 65 74 29 3b 0d 09 09 63 | 32 70 73 74 72 28 28 63 |et);...c|2pstr((c|
|00000b40| 68 61 72 2a 29 73 74 72 | 29 3b 0d 09 09 68 20 3d |har*)str|);...h =|
|00000b50| 20 67 48 20 2b 20 28 2a | 2a 67 49 6e 66 6f 29 2e | gH + (*|*gInfo).|
|00000b60| 67 72 6f 75 70 4e 61 6d | 65 48 43 6f 6f 72 64 3b |groupNam|eHCoord;|
|00000b70| 0d 09 09 54 72 75 6e 63 | 53 74 72 69 6e 67 28 67 |...Trunc|String(g|
|00000b80| 52 69 67 68 74 45 64 67 | 65 20 2d 20 68 2c 20 73 |RightEdg|e - h, s|
|00000b90| 74 72 2c 20 73 6d 54 72 | 75 6e 63 45 6e 64 29 3b |tr, smTr|uncEnd);|
|00000ba0| 0d 09 09 4d 6f 76 65 54 | 6f 28 68 2c 20 67 56 29 |...MoveT|o(h, gV)|
|00000bb0| 3b 0d 09 09 44 72 61 77 | 53 74 72 69 6e 67 28 73 |;...Draw|String(s|
|00000bc0| 74 72 29 3b 0d 09 7d 0d | 7d 0d 0d 0d 0d 2f 2a 2d |tr);..}.|}..../*-|
|00000bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000c10| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 0d 09 44 72 61 |--------|---..Dra|
|00000c20| 77 54 68 72 65 61 64 48 | 65 61 64 49 6e 66 6f 0d |wThreadH|eadInfo.|
|00000c30| 09 0d 09 44 72 61 77 20 | 74 68 65 20 74 68 72 65 |...Draw |the thre|
|00000c40| 61 64 20 68 65 61 64 20 | 69 6e 66 6f 20 66 6f 72 |ad head |info for|
|00000c50| 20 61 20 74 68 72 65 61 | 64 20 68 65 61 64 20 63 | a threa|d head c|
|00000c60| 65 6c 6c 20 69 6e 20 61 | 20 73 75 62 6a 65 63 74 |ell in a| subject|
|00000c70| 20 6c 69 73 74 20 0d 09 | 77 69 6e 64 6f 77 20 28 | list ..|window (|
|00000c80| 74 68 65 20 74 68 72 65 | 61 64 20 63 6f 6e 74 72 |the thre|ad contr|
|00000c90| 6f 6c 20 61 6e 64 20 6e | 75 6d 62 65 72 20 6f 66 |ol and n|umber of|
|00000ca0| 20 61 72 74 69 63 6c 65 | 73 20 69 6e 20 74 68 65 | article|s in the|
|00000cb0| 20 74 68 72 65 61 64 29 | 2e 0d 2d 2d 2d 2d 2d 2d | thread)|..------|
|00000cc0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000ce0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000cf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000d00| 2d 2d 2d 2d 2d 2d 2a 2f | 0d 0d 73 74 61 74 69 63 |------*/|..static|
|00000d10| 20 76 6f 69 64 20 44 72 | 61 77 54 68 72 65 61 64 | void Dr|awThread|
|00000d20| 48 65 61 64 49 6e 66 6f | 20 28 76 6f 69 64 29 0d |HeadInfo| (void).|
|00000d30| 7b 0d 09 50 6f 6c 79 48 | 61 6e 64 6c 65 20 70 6f |{..PolyH|andle po|
|00000d40| 6c 79 3b 0d 09 73 68 6f | 72 74 20 74 68 2c 20 74 |ly;..sho|rt th, t|
|00000d50| 76 3b 0d 09 53 74 72 32 | 35 35 20 73 74 72 3b 0d |v;..Str2|55 str;.|
|00000d60| 09 73 68 6f 72 74 20 74 | 68 72 65 61 64 4c 65 6e |.short t|hreadLen|
|00000d70| 67 74 68 3b 0d 0d 09 69 | 66 20 28 67 54 68 65 53 |gth;...i|f (gTheS|
|00000d80| 75 62 6a 65 63 74 2e 74 | 68 72 65 61 64 4c 65 6e |ubject.t|hreadLen|
|00000d90| 67 74 68 20 3d 3d 20 31 | 29 20 7b 0d 09 09 4d 6f |gth == 1|) {...Mo|
|00000da0| 76 65 54 6f 28 67 48 20 | 2b 20 28 2a 2a 67 49 6e |veTo(gH |+ (**gIn|
|00000db0| 66 6f 29 2e 6d 69 6e 75 | 73 53 69 67 6e 48 43 6f |fo).minu|sSignHCo|
|00000dc0| 6f 72 64 2c 20 67 56 29 | 3b 0d 09 09 44 72 61 77 |ord, gV)|;...Draw|
|00000dd0| 43 68 61 72 28 27 2d 27 | 29 3b 0d 09 7d 20 65 6c |Char('-'|);..} el|
|00000de0| 73 65 20 7b 0d 09 09 69 | 66 20 28 67 54 68 65 53 |se {...i|f (gTheS|
|00000df0| 75 62 6a 65 63 74 2e 63 | 6f 6c 6c 61 70 73 65 64 |ubject.c|ollapsed|
|00000e00| 29 20 7b 0d 09 09 09 70 | 6f 6c 79 20 3d 20 28 2a |) {....p|oly = (*|
|00000e10| 2a 67 49 6e 66 6f 29 2e | 63 6f 6c 6c 61 70 73 65 |*gInfo).|collapse|
|00000e20| 54 72 69 61 6e 67 6c 65 | 3b 0d 09 09 09 74 68 20 |Triangle|;....th |
|00000e30| 3d 20 67 48 20 2b 20 28 | 28 2a 2a 70 6f 6c 79 29 |= gH + (|(**poly)|
|00000e40| 2e 70 6f 6c 79 42 42 6f | 78 2e 72 69 67 68 74 20 |.polyBBo|x.right |
|00000e50| 3e 3e 20 31 29 20 2b 20 | 31 3b 20 0d 09 09 09 74 |>> 1) + |1; ....t|
|00000e60| 76 20 3d 20 67 52 65 63 | 74 2e 74 6f 70 20 2b 20 |v = gRec|t.top + |
|00000e70| 31 3b 0d 09 09 7d 20 65 | 6c 73 65 20 7b 0d 09 09 |1;...} e|lse {...|
|00000e80| 09 70 6f 6c 79 20 3d 20 | 28 2a 2a 67 49 6e 66 6f |.poly = |(**gInfo|
|00000e90| 29 2e 65 78 70 61 6e 64 | 54 72 69 61 6e 67 6c 65 |).expand|Triangle|
|00000ea0| 3b 0d 09 09 09 74 68 20 | 3d 20 67 48 20 2b 20 31 |;....th |= gH + 1|
|00000eb0| 3b 20 0d 09 09 09 74 76 | 20 3d 20 67 52 65 63 74 |; ....tv| = gRect|
|00000ec0| 2e 74 6f 70 20 2b 20 28 | 28 2a 2a 70 6f 6c 79 29 |.top + (|(**poly)|
|00000ed0| 2e 70 6f 6c 79 42 42 6f | 78 2e 62 6f 74 74 6f 6d |.polyBBo|x.bottom|
|00000ee0| 20 3e 3e 20 31 29 20 2b | 20 31 3b 0d 09 09 7d 0d | >> 1) +| 1;...}.|
|00000ef0| 09 09 4f 66 66 73 65 74 | 50 6f 6c 79 28 70 6f 6c |..Offset|Poly(pol|
|00000f00| 79 2c 20 74 68 2c 20 74 | 76 29 3b 0d 09 09 69 66 |y, th, t|v);...if|
|00000f10| 20 28 67 54 68 65 53 75 | 62 6a 65 63 74 2e 64 72 | (gTheSu|bject.dr|
|00000f20| 61 77 54 72 69 61 6e 67 | 6c 65 46 69 6c 6c 65 64 |awTriang|leFilled|
|00000f30| 29 20 7b 0d 09 09 09 46 | 69 6c 6c 50 6f 6c 79 28 |) {....F|illPoly(|
|00000f40| 70 6f 6c 79 2c 20 26 71 | 64 2e 62 6c 61 63 6b 29 |poly, &q|d.black)|
|00000f50| 3b 0d 09 09 7d 20 65 6c | 73 65 20 7b 0d 09 09 09 |;...} el|se {....|
|00000f60| 46 69 6c 6c 43 6f 6c 6f | 72 50 6f 6c 79 28 70 6f |FillColo|rPoly(po|
|00000f70| 6c 79 2c 20 26 67 4c 69 | 67 68 74 42 6c 75 65 2c |ly, &gLi|ghtBlue,|
|00000f80| 20 26 71 64 2e 67 72 61 | 79 29 3b 0d 09 09 7d 0d | &qd.gra|y);...}.|
|00000f90| 09 09 46 72 61 6d 65 50 | 6f 6c 79 28 70 6f 6c 79 |..FrameP|oly(poly|
|00000fa0| 29 3b 0d 09 09 4f 66 66 | 73 65 74 50 6f 6c 79 28 |);...Off|setPoly(|
|00000fb0| 70 6f 6c 79 2c 20 2d 74 | 68 2c 20 2d 74 76 29 3b |poly, -t|h, -tv);|
|00000fc0| 0d 0d 09 09 69 66 20 28 | 21 67 54 68 65 53 75 62 |....if (|!gTheSub|
|00000fd0| 6a 65 63 74 2e 6f 6e 6c | 79 52 65 64 72 61 77 54 |ject.onl|yRedrawT|
|00000fe0| 72 69 61 6e 67 6c 65 29 | 20 7b 0d 09 09 09 74 68 |riangle)| {....th|
|00000ff0| 72 65 61 64 4c 65 6e 67 | 74 68 20 3d 20 67 54 68 |readLeng|th = gTh|
|00001000| 65 53 75 62 6a 65 63 74 | 2e 74 68 72 65 61 64 4c |eSubject|.threadL|
|00001010| 65 6e 67 74 68 3b 0d 09 | 09 09 69 66 20 28 74 68 |ength;..|..if (th|
|00001020| 72 65 61 64 4c 65 6e 67 | 74 68 20 3e 20 39 39 29 |readLeng|th > 99)|
|00001030| 20 74 68 72 65 61 64 4c | 65 6e 67 74 68 20 3d 20 | threadL|ength = |
|00001040| 39 39 3b 0d 09 09 09 4e | 75 6d 54 6f 53 74 72 69 |99;....N|umToStri|
|00001050| 6e 67 28 74 68 72 65 61 | 64 4c 65 6e 67 74 68 2c |ng(threa|dLength,|
|00001060| 20 73 74 72 29 3b 0d 09 | 09 09 4d 6f 76 65 54 6f | str);..|..MoveTo|
|00001070| 28 67 48 20 2b 20 28 2a | 2a 67 49 6e 66 6f 29 2e |(gH + (*|*gInfo).|
|00001080| 74 68 72 65 61 64 43 6f | 75 6e 74 48 43 6f 6f 72 |threadCo|untHCoor|
|00001090| 64 20 2d 20 53 74 72 69 | 6e 67 57 69 64 74 68 28 |d - Stri|ngWidth(|
|000010a0| 73 74 72 29 2c 20 67 56 | 29 3b 0d 09 09 09 44 72 |str), gV|);....Dr|
|000010b0| 61 77 53 74 72 69 6e 67 | 28 73 74 72 29 3b 0d 09 |awString|(str);..|
|000010c0| 09 7d 0d 09 7d 0d 7d 0d | 0d 0d 0d 2f 2a 2d 2d 2d |.}..}.}.|.../*---|
|000010d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000010f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001100| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001110| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 0d 09 44 72 61 77 43 |--------|-..DrawC|
|00001120| 68 65 63 6b 4d 61 72 6b | 0d 09 0d 09 44 72 61 77 |heckMark|....Draw|
|00001130| 20 74 68 65 20 61 72 74 | 69 63 6c 65 20 72 65 61 | the art|icle rea|
|00001140| 64 20 63 68 65 63 6b 20 | 6d 61 72 6b 20 69 6e 20 |d check |mark in |
|00001150| 61 20 63 65 6c 6c 20 69 | 6e 20 61 20 73 75 62 6a |a cell i|n a subj|
|00001160| 65 63 74 20 6c 69 73 74 | 20 77 69 6e 64 6f 77 2e |ect list| window.|
|00001170| 0d 09 46 6f 72 20 63 6f | 6c 6c 61 70 73 65 64 20 |..For co|llapsed |
|00001180| 74 68 72 65 61 64 20 68 | 65 61 64 20 63 65 6c 6c |thread h|ead cell|
|00001190| 73 2c 20 74 68 65 20 6d | 61 72 6b 20 69 73 20 64 |s, the m|ark is d|
|000011a0| 72 61 77 6e 20 69 66 66 | 20 74 68 65 20 65 6e 74 |rawn iff| the ent|
|000011b0| 69 72 65 0d 09 74 68 72 | 65 61 64 20 68 61 73 20 |ire..thr|ead has |
|000011c0| 62 65 65 6e 20 72 65 61 | 64 2e 20 0d 2d 2d 2d 2d |been rea|d. .----|
|000011d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000011f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001200| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001210| 2d 2d 2d 2d 2d 2d 2d 2d | 2a 2f 0d 0d 73 74 61 74 |--------|*/..stat|
|00001220| 69 63 20 76 6f 69 64 20 | 44 72 61 77 43 68 65 63 |ic void |DrawChec|
|00001230| 6b 4d 61 72 6b 20 28 76 | 6f 69 64 29 0d 7b 0d 09 |kMark (v|oid).{..|
|00001240| 42 6f 6f 6c 65 61 6e 20 | 72 65 61 64 3b 0d 09 73 |Boolean |read;..s|
|00001250| 68 6f 72 74 20 6e 65 78 | 74 49 6e 54 68 72 65 61 |hort nex|tInThrea|
|00001260| 64 3b 0d 09 54 65 78 74 | 53 74 79 6c 65 20 73 61 |d;..Text|Style sa|
|00001270| 76 65 64 53 74 79 6c 65 | 3b 0d 0d 09 69 66 20 28 |vedStyle|;...if (|
|00001280| 67 54 68 65 53 75 62 6a | 65 63 74 2e 63 6f 6c 6c |gTheSubj|ect.coll|
|00001290| 61 70 73 65 64 29 20 7b | 0d 09 09 72 65 61 64 20 |apsed) {|...read |
|000012a0| 3d 20 74 72 75 65 3b 0d | 09 09 6e 65 78 74 49 6e |= true;.|..nextIn|
|000012b0| 54 68 72 65 61 64 20 3d | 20 67 49 6e 64 65 78 3b |Thread =| gIndex;|
|000012c0| 0d 09 09 77 68 69 6c 65 | 20 28 74 72 75 65 29 20 |...while| (true) |
|000012d0| 7b 0d 09 09 09 69 66 20 | 28 21 28 2a 67 53 75 62 |{....if |(!(*gSub|
|000012e0| 6a 65 63 74 41 72 72 61 | 79 29 5b 6e 65 78 74 49 |jectArra|y)[nextI|
|000012f0| 6e 54 68 72 65 61 64 5d | 2e 72 65 61 64 29 20 7b |nThread]|.read) {|
|00001300| 0d 09 09 09 09 72 65 61 | 64 20 3d 20 66 61 6c 73 |.....rea|d = fals|
|00001310| 65 3b 0d 09 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |e;.....b|reak;...|
|00001320| 09 7d 0d 09 09 09 6e 65 | 78 74 49 6e 54 68 72 65 |.}....ne|xtInThre|
|00001330| 61 64 20 3d 20 0d 09 09 | 09 09 28 2a 67 53 75 62 |ad = ...|..(*gSub|
|00001340| 6a 65 63 74 41 72 72 61 | 79 29 5b 6e 65 78 74 49 |jectArra|y)[nextI|
|00001350| 6e 54 68 72 65 61 64 5d | 2e 6e 65 78 74 49 6e 54 |nThread]|.nextInT|
|00001360| 68 72 65 61 64 3b 0d 09 | 09 09 69 66 20 28 6e 65 |hread;..|..if (ne|
|00001370| 78 74 49 6e 54 68 72 65 | 61 64 20 3d 3d 20 2d 31 |xtInThre|ad == -1|
|00001380| 29 20 62 72 65 61 6b 3b | 0d 09 09 7d 0d 09 7d 20 |) break;|...}..} |
|00001390| 65 6c 73 65 20 7b 0d 09 | 09 72 65 61 64 20 3d 20 |else {..|.read = |
|000013a0| 67 54 68 65 53 75 62 6a | 65 63 74 2e 72 65 61 64 |gTheSubj|ect.read|
|000013b0| 3b 0d 09 7d 0d 09 69 66 | 20 28 72 65 61 64 29 20 |;..}..if| (read) |
|000013c0| 7b 0d 09 09 47 65 74 50 | 6f 72 74 54 65 78 74 53 |{...GetP|ortTextS|
|000013d0| 74 79 6c 65 28 26 73 61 | 76 65 64 53 74 79 6c 65 |tyle(&sa|vedStyle|
|000013e0| 29 3b 0d 09 09 54 65 78 | 74 46 6f 6e 74 28 73 79 |);...Tex|tFont(sy|
|000013f0| 73 74 65 6d 46 6f 6e 74 | 29 3b 0d 09 09 4d 6f 76 |stemFont|);...Mov|
|00001400| 65 54 6f 28 67 48 20 2b | 20 28 2a 2a 67 49 6e 66 |eTo(gH +| (**gInf|
|00001410| 6f 29 2e 63 68 65 63 6b | 48 43 6f 6f 72 64 2c 20 |o).check|HCoord, |
|00001420| 67 56 29 3b 0d 09 09 44 | 72 61 77 43 68 61 72 28 |gV);...D|rawChar(|
|00001430| 63 68 65 63 6b 4d 61 72 | 6b 29 3b 0d 09 09 53 65 |checkMar|k);...Se|
|00001440| 74 50 6f 72 74 54 65 78 | 74 53 74 79 6c 65 28 26 |tPortTex|tStyle(&|
|00001450| 73 61 76 65 64 53 74 79 | 6c 65 29 3b 0d 09 7d 20 |savedSty|le);..} |
|00001460| 65 6c 73 65 20 69 66 20 | 28 67 54 68 65 53 75 62 |else if |(gTheSub|
|00001470| 6a 65 63 74 2e 69 6e 63 | 6f 6d 70 6c 65 74 65 29 |ject.inc|omplete)|
|00001480| 20 7b 0d 09 09 4d 6f 76 | 65 54 6f 28 67 48 20 2b | {...Mov|eTo(gH +|
|00001490| 20 28 2a 2a 67 49 6e 66 | 6f 29 2e 63 68 65 63 6b | (**gInf|o).check|
|000014a0| 48 43 6f 6f 72 64 2c 20 | 67 56 29 3b 0d 09 09 44 |HCoord, |gV);...D|
|000014b0| 72 61 77 43 68 61 72 28 | 27 3c 27 29 3b 0d 09 7d |rawChar(|'<');..}|
|000014c0| 20 65 6c 73 65 20 69 66 | 20 28 67 54 68 65 53 75 | else if| (gTheSu|
|000014d0| 62 6a 65 63 74 2e 63 6f | 6d 70 6c 65 74 65 29 20 |bject.co|mplete) |
|000014e0| 7b 0d 09 09 4d 6f 76 65 | 54 6f 28 67 48 20 2b 20 |{...Move|To(gH + |
|000014f0| 28 2a 2a 67 49 6e 66 6f | 29 2e 63 68 65 63 6b 48 |(**gInfo|).checkH|
|00001500| 43 6f 6f 72 64 2c 20 67 | 56 29 3b 0d 09 09 44 72 |Coord, g|V);...Dr|
|00001510| 61 77 43 68 61 72 28 27 | a5 27 29 3b 0d 09 7d 0d |awChar('|.');..}.|
|00001520| 7d 0d 0d 0d 0d 2f 2a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..../*-|--------|
|00001530| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001540| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001550| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001560| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001570| 2d 2d 2d 0d 09 44 72 61 | 77 41 75 74 68 6f 72 41 |---..Dra|wAuthorA|
|00001580| 6e 64 53 75 62 6a 65 63 | 74 0d 09 0d 09 44 72 61 |ndSubjec|t....Dra|
|00001590| 77 20 74 68 65 20 61 75 | 74 68 6f 72 20 61 6e 64 |w the au|thor and|
|000015a0| 20 73 75 62 6a 65 63 74 | 20 69 6e 20 61 20 63 65 | subject| in a ce|
|000015b0| 6c 6c 20 69 6e 20 61 20 | 73 75 62 6a 65 63 74 20 |ll in a |subject |
|000015c0| 6c 69 73 74 20 77 69 6e | 64 6f 77 2e 0d 2d 2d 2d |list win|dow..---|
|000015d0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000015f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001600| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001610| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2a 2f 0d 0d 73 74 61 |--------|-*/..sta|
|00001620| 74 69 63 20 76 6f 69 64 | 20 44 72 61 77 41 75 74 |tic void| DrawAut|
|00001630| 68 6f 72 41 6e 64 53 75 | 62 6a 65 63 74 20 28 76 |horAndSu|bject (v|
|00001640| 6f 69 64 29 0d 7b 0d 09 | 53 74 72 32 35 35 20 73 |oid).{..|Str255 s|
|00001650| 74 72 3b 0d 09 73 68 6f | 72 74 20 68 3b 0d 0d 09 |tr;..sho|rt h;...|
|00001660| 69 66 20 28 28 2a 2a 67 | 49 6e 66 6f 29 2e 61 75 |if ((**g|Info).au|
|00001670| 74 68 6f 72 73 53 68 6f | 77 6e 20 26 26 20 67 54 |thorsSho|wn && gT|
|00001680| 68 65 53 75 62 6a 65 63 | 74 2e 61 75 74 68 6f 72 |heSubjec|t.author|
|00001690| 4f 66 66 73 65 74 20 3e | 3d 20 30 29 20 7b 0d 09 |Offset >|= 0) {..|
|000016a0| 09 73 74 72 63 70 79 28 | 28 63 68 61 72 2a 29 73 |.strcpy(|(char*)s|
|000016b0| 74 72 2c 20 2a 67 53 74 | 72 69 6e 67 73 20 2b 20 |tr, *gSt|rings + |
|000016c0| 67 54 68 65 53 75 62 6a | 65 63 74 2e 61 75 74 68 |gTheSubj|ect.auth|
|000016d0| 6f 72 4f 66 66 73 65 74 | 29 3b 0d 09 09 46 6f 72 |orOffset|);...For|
|000016e0| 6d 61 74 41 75 74 68 6f | 72 4e 61 6d 65 28 28 63 |matAutho|rName((c|
|000016f0| 68 61 72 2a 29 73 74 72 | 29 3b 0d 09 09 63 32 70 |har*)str|);...c2p|
|00001700| 73 74 72 28 28 63 68 61 | 72 2a 29 73 74 72 29 3b |str((cha|r*)str);|
|00001710| 0d 09 09 54 72 75 6e 63 | 53 74 72 69 6e 67 28 28 |...Trunc|String((|
|00001720| 2a 2a 67 49 6e 66 6f 29 | 2e 61 75 74 68 6f 72 57 |**gInfo)|.authorW|
|00001730| 69 64 74 68 2c 20 73 74 | 72 2c 20 73 6d 54 72 75 |idth, st|r, smTru|
|00001740| 6e 63 45 6e 64 29 3b 0d | 09 09 4d 6f 76 65 54 6f |ncEnd);.|..MoveTo|
|00001750| 28 67 48 20 2b 20 28 2a | 2a 67 49 6e 66 6f 29 2e |(gH + (*|*gInfo).|
|00001760| 61 75 74 68 6f 72 48 43 | 6f 6f 72 64 2c 20 67 56 |authorHC|oord, gV|
|00001770| 29 3b 0d 09 09 44 72 61 | 77 53 74 72 69 6e 67 28 |);...Dra|wString(|
|00001780| 73 74 72 29 3b 0d 09 7d | 0d 09 73 74 72 63 70 79 |str);..}|..strcpy|
|00001790| 28 28 63 68 61 72 2a 29 | 73 74 72 2c 20 2a 67 53 |((char*)|str, *gS|
|000017a0| 74 72 69 6e 67 73 20 2b | 20 67 54 68 65 53 75 62 |trings +| gTheSub|
|000017b0| 6a 65 63 74 2e 73 75 62 | 6a 65 63 74 4f 66 66 73 |ject.sub|jectOffs|
|000017c0| 65 74 29 3b 0d 09 63 32 | 70 73 74 72 28 28 63 68 |et);..c2|pstr((ch|
|000017d0| 61 72 2a 29 73 74 72 29 | 3b 0d 09 68 20 3d 20 67 |ar*)str)|;..h = g|
|000017e0| 48 20 2b 20 28 2a 2a 67 | 49 6e 66 6f 29 2e 73 75 |H + (**g|Info).su|
|000017f0| 62 6a 65 63 74 48 43 6f | 6f 72 64 3b 0d 09 54 72 |bjectHCo|ord;..Tr|
|00001800| 75 6e 63 53 74 72 69 6e | 67 28 67 52 69 67 68 74 |uncStrin|g(gRight|
|00001810| 45 64 67 65 20 2d 20 68 | 2c 20 73 74 72 2c 20 73 |Edge - h|, str, s|
|00001820| 6d 54 72 75 6e 63 45 6e | 64 29 3b 0d 09 4d 6f 76 |mTruncEn|d);..Mov|
|00001830| 65 54 6f 28 68 2c 20 67 | 56 29 3b 0d 09 44 72 61 |eTo(h, g|V);..Dra|
|00001840| 77 53 74 72 69 6e 67 28 | 73 74 72 29 3b 0d 7d 0d |wString(|str);.}.|
|00001850| 0d 0d 0d 2f 2a 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.../*---|--------|
|00001860| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001870| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001880| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001890| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000018a0| 2d 0d 09 44 72 61 77 53 | 75 62 6a 65 63 74 43 65 |-..DrawS|ubjectCe|
|000018b0| 6c 6c 0d 09 0d 09 44 72 | 61 77 20 61 20 73 69 6e |ll....Dr|aw a sin|
|000018c0| 67 6c 65 20 63 65 6c 6c | 20 69 6e 20 61 20 73 75 |gle cell| in a su|
|000018d0| 62 6a 65 63 74 20 6c 69 | 73 74 20 77 69 6e 64 6f |bject li|st windo|
|000018e0| 77 2e 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |w..-----|--------|
|000018f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001900| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001910| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001920| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2a |--------|-------*|
|00001930| 2f 0d 0d 73 74 61 74 69 | 63 20 76 6f 69 64 20 44 |/..stati|c void D|
|00001940| 72 61 77 53 75 62 6a 65 | 63 74 43 65 6c 6c 20 28 |rawSubje|ctCell (|
|00001950| 76 6f 69 64 29 0d 7b 09 | 0d 09 67 53 75 62 6a 65 |void).{.|..gSubje|
|00001960| 63 74 41 72 72 61 79 20 | 3d 20 28 2a 2a 67 49 6e |ctArray |= (**gIn|
|00001970| 66 6f 29 2e 73 75 62 6a | 65 63 74 41 72 72 61 79 |fo).subj|ectArray|
|00001980| 3b 0d 09 67 54 68 65 53 | 75 62 6a 65 63 74 20 3d |;..gTheS|ubject =|
|00001990| 20 28 2a 67 53 75 62 6a | 65 63 74 41 72 72 61 79 | (*gSubj|ectArray|
|000019a0| 29 5b 67 49 6e 64 65 78 | 5d 3b 0d 09 67 45 72 61 |)[gIndex|];..gEra|
|000019b0| 73 65 52 65 63 74 20 3d | 20 67 52 65 63 74 3b 0d |seRect =| gRect;.|
|000019c0| 09 69 66 20 28 67 54 68 | 65 53 75 62 6a 65 63 74 |.if (gTh|eSubject|
|000019d0| 2e 6f 6e 6c 79 52 65 64 | 72 61 77 54 72 69 61 6e |.onlyRed|rawTrian|
|000019e0| 67 6c 65 29 20 7b 0d 09 | 09 67 45 72 61 73 65 52 |gle) {..|.gEraseR|
|000019f0| 65 63 74 2e 72 69 67 68 | 74 20 3d 20 67 48 20 2b |ect.righ|t = gH +|
|00001a00| 20 67 46 6f 6e 74 49 6e | 66 6f 2e 61 73 63 65 6e | gFontIn|fo.ascen|
|00001a10| 74 20 2b 20 32 3b 0d 09 | 7d 20 65 6c 73 65 20 69 |t + 2;..|} else i|
|00001a20| 66 20 28 67 54 68 65 53 | 75 62 6a 65 63 74 2e 6f |f (gTheS|ubject.o|
|00001a30| 6e 6c 79 52 65 64 72 61 | 77 43 68 65 63 6b 29 20 |nlyRedra|wCheck) |
|00001a40| 7b 0d 09 09 67 45 72 61 | 73 65 52 65 63 74 2e 6c |{...gEra|seRect.l|
|00001a50| 65 66 74 20 3d 20 67 48 | 20 2b 20 28 2a 2a 67 49 |eft = gH| + (**gI|
|00001a60| 6e 66 6f 29 2e 63 68 65 | 63 6b 48 43 6f 6f 72 64 |nfo).che|ckHCoord|
|00001a70| 3b 0d 09 09 67 45 72 61 | 73 65 52 65 63 74 2e 72 |;...gEra|seRect.r|
|00001a80| 69 67 68 74 20 3d 20 67 | 48 20 2b 20 28 2a 2a 67 |ight = g|H + (**g|
|00001a90| 49 6e 66 6f 29 2e 61 75 | 74 68 6f 72 48 43 6f 6f |Info).au|thorHCoo|
|00001aa0| 72 64 3b 0d 09 7d 0d 09 | 45 72 61 73 65 52 65 63 |rd;..}..|EraseRec|
|00001ab0| 74 28 26 67 45 72 61 73 | 65 52 65 63 74 29 3b 0d |t(&gEras|eRect);.|
|00001ac0| 0d 09 69 66 20 28 67 54 | 68 65 53 75 62 6a 65 63 |..if (gT|heSubjec|
|00001ad0| 74 2e 74 68 72 65 61 64 | 4f 72 64 69 6e 61 6c 20 |t.thread|Ordinal |
|00001ae0| 3d 3d 20 31 20 26 26 20 | 21 67 54 68 65 53 75 62 |== 1 && |!gTheSub|
|00001af0| 6a 65 63 74 2e 6f 6e 6c | 79 52 65 64 72 61 77 43 |ject.onl|yRedrawC|
|00001b00| 68 65 63 6b 29 20 0d 09 | 09 44 72 61 77 54 68 72 |heck) ..|.DrawThr|
|00001b10| 65 61 64 48 65 61 64 49 | 6e 66 6f 28 29 3b 0d 09 |eadHeadI|nfo();..|
|00001b20| 0d 09 69 66 20 28 21 67 | 54 68 65 53 75 62 6a 65 |..if (!g|TheSubje|
|00001b30| 63 74 2e 6f 6e 6c 79 52 | 65 64 72 61 77 54 72 69 |ct.onlyR|edrawTri|
|00001b40| 61 6e 67 6c 65 29 20 0d | 09 09 44 72 61 77 43 68 |angle) .|..DrawCh|
|00001b50| 65 63 6b 4d 61 72 6b 28 | 29 3b 0d 09 09 0d 09 69 |eckMark(|);.....i|
|00001b60| 66 20 28 21 67 54 68 65 | 53 75 62 6a 65 63 74 2e |f (!gThe|Subject.|
|00001b70| 6f 6e 6c 79 52 65 64 72 | 61 77 54 72 69 61 6e 67 |onlyRedr|awTriang|
|00001b80| 6c 65 20 26 26 20 21 67 | 54 68 65 53 75 62 6a 65 |le && !g|TheSubje|
|00001b90| 63 74 2e 6f 6e 6c 79 52 | 65 64 72 61 77 43 68 65 |ct.onlyR|edrawChe|
|00001ba0| 63 6b 29 20 0d 09 09 44 | 72 61 77 41 75 74 68 6f |ck) ...D|rawAutho|
|00001bb0| 72 41 6e 64 53 75 62 6a | 65 63 74 28 29 3b 0d 7d |rAndSubj|ect();.}|
|00001bc0| 0d 0d 0d 0d 2f 2a 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |..../*--|--------|
|00001bd0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001be0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001bf0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c00| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c10| 2d 2d 0d 09 48 69 6c 69 | 74 65 43 65 6c 6c 0d 09 |--..Hili|teCell..|
|00001c20| 0d 09 48 69 6c 69 74 65 | 20 74 68 65 20 63 65 6c |..Hilite| the cel|
|00001c30| 6c 2e 0d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |l..-----|--------|
|00001c40| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c50| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c60| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00001c70| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2a |--------|-------*|
|00001c80| 2f 0d 0d 73 74 61 74 69 | 63 20 76 6f 69 64 20 48 |/..stati|c void H|
|00001c90| 69 6c 69 74 65 43 65 6c | 6c 20 28 76 6f 69 64 29 |iliteCel|l (void)|
|00001ca0| 0d 7b 0d 09 73 68 6f 72 | 74 20 70 6e 4d 6f 64 65 |.{..shor|t pnMode|
|00001cb0| 3b 0d 09 52 65 63 74 20 | 76 69 73 69 62 6c 65 3b |;..Rect |visible;|
|00001cc0| 0d 09 42 6f 6f 6c 65 61 | 6e 20 68 61 73 43 6f 6c |..Boolea|n hasCol|
|00001cd0| 6f 72 51 44 3b 0d 09 75 | 6e 73 69 67 6e 65 64 20 |orQD;..u|nsigned |
|00001ce0| 63 68 61 72 20 68 69 6c | 69 74 65 4d 6f 64 65 3b |char hil|iteMode;|
|00001cf0| 0d 0d 09 68 61 73 43 6f | 6c 6f 72 51 44 20 3d 20 |...hasCo|lorQD = |
|00001d00| 48 61 73 43 6f 6c 6f 72 | 51 44 28 29 3b 0d 09 69 |HasColor|QD();..i|
|00001d10| 66 20 28 28 2a 2a 67 54 | 68 65 4c 69 73 74 29 2e |f ((**gT|heList).|
|00001d20| 6c 41 63 74 69 76 65 20 | 26 26 20 28 28 57 69 6e |lActive |&& ((Win|
|00001d30| 64 6f 77 50 65 65 6b 29 | 71 64 2e 74 68 65 50 6f |dowPeek)|qd.thePo|
|00001d40| 72 74 29 2d 3e 68 69 6c | 69 74 65 64 29 20 7b 0d |rt)->hil|ited) {.|
|00001d50| 09 09 69 66 20 28 68 61 | 73 43 6f 6c 6f 72 51 44 |..if (ha|sColorQD|
|00001d60| 29 20 7b 0d 09 09 09 68 | 69 6c 69 74 65 4d 6f 64 |) {....h|iliteMod|
|00001d70| 65 20 3d 20 4c 4d 47 65 | 74 48 69 6c 69 74 65 4d |e = LMGe|tHiliteM|
|00001d80| 6f 64 65 28 29 3b 0d 09 | 09 09 42 69 74 43 6c 72 |ode();..|..BitClr|
|00001d90| 28 26 68 69 6c 69 74 65 | 4d 6f 64 65 2c 20 70 48 |(&hilite|Mode, pH|
|00001da0| 69 6c 69 74 65 42 69 74 | 29 3b 0d 09 09 09 4c 4d |iliteBit|);....LM|
|00001db0| 53 65 74 48 69 6c 69 74 | 65 4d 6f 64 65 28 68 69 |SetHilit|eMode(hi|
|00001dc0| 6c 69 74 65 4d 6f 64 65 | 29 3b 0d 09 09 7d 0d 09 |liteMode|);...}..|
|00001dd0| 09 49 6e 76 65 72 74 52 | 65 63 74 28 26 67 45 72 |.InvertR|ect(&gEr|
|00001de0| 61 73 65 52 65 63 74 29 | 3b 0d 09 7d 20 65 6c 73 |aseRect)|;..} els|
|00001df0| 65 20 7b 0d 09 09 76 69 | 73 69 62 6c 65 20 3d 20 |e {...vi|sible = |
|00001e00| 28 2a 2a 67 54 68 65 4c | 69 73 74 29 2e 76 69 73 |(**gTheL|ist).vis|
|00001e10| 69 62 6c 65 3b 0d 09 09 | 70 6e 4d 6f 64 65 20 3d |ible;...|pnMode =|
|00001e20| 20 71 64 2e 74 68 65 50 | 6f 72 74 2d 3e 70 6e 4d | qd.theP|ort->pnM|
|00001e30| 6f 64 65 3b 0d 09 09 69 | 66 20 28 68 61 73 43 6f |ode;...i|f (hasCo|
|00001e40| 6c 6f 72 51 44 29 20 50 | 65 6e 4d 6f 64 65 28 35 |lorQD) P|enMode(5|
|00001e50| 30 20 2b 20 70 6e 4d 6f | 64 65 29 3b 0d 09 09 43 |0 + pnMo|de);...C|
|00001e60| 6c 69 70 52 65 63 74 28 | 26 67 45 72 61 73 65 52 |lipRect(|&gEraseR|
|00001e70| 65 63 74 29 3b 0d 09 09 | 4d 6f 76 65 54 6f 28 67 |ect);...|MoveTo(g|
|00001e80| 52 65 63 74 2e 6c 65 66 | 74 20 2b 20 33 2c 20 67 |Rect.lef|t + 3, g|
|00001e90| 52 65 63 74 2e 74 6f 70 | 29 3b 0d 09 09 4c 69 6e |Rect.top|);...Lin|
|00001ea0| 65 54 6f 28 67 52 65 63 | 74 2e 6c 65 66 74 20 2b |eTo(gRec|t.left +|
|00001eb0| 20 33 2c 20 67 52 65 63 | 74 2e 62 6f 74 74 6f 6d | 3, gRec|t.bottom|
|00001ec0| 20 2d 20 31 29 3b 0d 09 | 09 4d 6f 76 65 54 6f 28 | - 1);..|.MoveTo(|
|00001ed0| 67 52 65 63 74 2e 72 69 | 67 68 74 20 2d 20 34 2c |gRect.ri|ght - 4,|
|00001ee0| 20 67 52 65 63 74 2e 74 | 6f 70 29 3b 0d 09 09 4c | gRect.t|op);...L|
|00001ef0| 69 6e 65 54 6f 28 67 52 | 65 63 74 2e 72 69 67 68 |ineTo(gR|ect.righ|
|00001f00| 74 20 2d 20 34 2c 20 67 | 52 65 63 74 2e 62 6f 74 |t - 4, g|Rect.bot|
|00001f10| 74 6f 6d 20 2d 20 31 29 | 3b 0d 09 09 69 66 20 28 |tom - 1)|;...if (|
|00001f20| 67 52 6f 77 20 3d 3d 20 | 76 69 73 69 62 6c 65 2e |gRow == |visible.|
|00001f30| 74 6f 70 20 7c 7c 20 28 | 2a 2a 67 54 68 65 4c 69 |top || (|**gTheLi|
|00001f40| 73 74 29 2e 63 65 6c 6c | 41 72 72 61 79 5b 67 52 |st).cell|Array[gR|
|00001f50| 6f 77 2d 31 5d 20 3e 3d | 20 30 29 20 7b 0d 09 09 |ow-1] >=| 0) {...|
|00001f60| 09 4d 6f 76 65 54 6f 28 | 67 52 65 63 74 2e 6c 65 |.MoveTo(|gRect.le|
|00001f70| 66 74 20 2b 20 34 2c 20 | 67 52 65 63 74 2e 74 6f |ft + 4, |gRect.to|
|00001f80| 70 29 3b 0d 09 09 09 4c | 69 6e 65 54 6f 28 67 52 |p);....L|ineTo(gR|
|00001f90| 65 63 74 2e 72 69 67 68 | 74 20 2d 20 35 2c 20 67 |ect.righ|t - 5, g|
|00001fa0| 52 65 63 74 2e 74 6f 70 | 29 3b 0d 09 09 7d 0d 09 |Rect.top|);...}..|
|00001fb0| 09 69 66 20 28 67 52 6f | 77 20 3d 3d 20 76 69 73 |.if (gRo|w == vis|
|00001fc0| 69 62 6c 65 2e 62 6f 74 | 74 6f 6d 20 2d 20 31 20 |ible.bot|tom - 1 |
|00001fd0| 7c 7c 20 28 2a 2a 67 54 | 68 65 4c 69 73 74 29 2e ||| (**gT|heList).|
|00001fe0| 63 65 6c 6c 41 72 72 61 | 79 5b 67 52 6f 77 2b 31 |cellArra|y[gRow+1|
|00001ff0| 5d 20 3e 3d 20 30 29 20 | 7b 0d 09 09 09 4d 6f 76 |] >= 0) |{....Mov|
|00002000| 65 54 6f 28 67 52 65 63 | 74 2e 6c 65 66 74 20 2b |eTo(gRec|t.left +|
|00002010| 20 34 2c 20 67 52 65 63 | 74 2e 62 6f 74 74 6f 6d | 4, gRec|t.bottom|
|00002020| 20 2d 20 31 29 3b 0d 09 | 09 09 4c 69 6e 65 54 6f | - 1);..|..LineTo|
|00002030| 28 67 52 65 63 74 2e 72 | 69 67 68 74 20 2d 20 35 |(gRect.r|ight - 5|
|00002040| 2c 20 67 52 65 63 74 2e | 62 6f 74 74 6f 6d 20 2d |, gRect.|bottom -|
|00002050| 20 31 29 3b 0d 09 09 7d | 0d 09 09 43 6c 69 70 52 | 1);...}|...ClipR|
|00002060| 65 63 74 28 26 67 52 65 | 63 74 29 3b 0d 09 09 50 |ect(&gRe|ct);...P|
|00002070| 65 6e 4d 6f 64 65 28 70 | 6e 4d 6f 64 65 29 3b 0d |enMode(p|nMode);.|
|00002080| 09 7d 0d 7d 0d 0d 0d 0d | 2f 2a 2d 2d 2d 2d 2d 2d |.}.}....|/*------|
|00002090| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000020d0| 2d 2d 2d 2d 2d 2d 0d 09 | 4c 69 73 74 44 65 66 46 |------..|ListDefF|
|000020e0| 75 6e 63 0d 09 0d 09 54 | 68 69 73 20 69 73 20 74 |unc....T|his is t|
|000020f0| 68 65 20 6c 69 73 74 20 | 64 65 66 69 6e 69 74 69 |he list |definiti|
|00002100| 6f 6e 20 66 75 6e 63 74 | 69 6f 6e 20 75 73 65 64 |on funct|ion used|
|00002110| 20 66 6f 72 20 67 72 6f | 75 70 20 61 6e 64 20 73 | for gro|up and s|
|00002120| 75 62 6a 65 63 74 20 6c | 69 73 74 20 0d 09 77 69 |ubject l|ist ..wi|
|00002130| 6e 64 6f 77 73 2e 20 49 | 74 20 69 73 20 63 61 6c |ndows. I|t is cal|
|00002140| 6c 65 64 20 62 79 20 74 | 68 65 20 73 74 75 62 20 |led by t|he stub |
|00002150| 63 6f 64 65 20 69 6e 20 | 74 68 65 20 73 74 61 6e |code in |the stan|
|00002160| 64 61 6c 6f 6e 65 20 4c | 44 45 46 20 31 32 38 20 |dalone L|DEF 128 |
|00002170| 63 6f 64 65 20 0d 09 72 | 65 73 6f 75 72 63 65 2e |code ..r|esource.|
|00002180| 0d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.-------|--------|
|00002190| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021b0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000021c0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2a 2f 0d |--------|-----*/.|
|000021d0| 0d 73 74 61 74 69 63 20 | 70 61 73 63 61 6c 20 76 |.static |pascal v|
|000021e0| 6f 69 64 20 4c 69 73 74 | 44 65 66 46 75 6e 63 20 |oid List|DefFunc |
|000021f0| 28 73 68 6f 72 74 20 6c | 4d 65 73 73 61 67 65 2c |(short l|Message,|
|00002200| 20 42 6f 6f 6c 65 61 6e | 20 6c 53 65 6c 65 63 74 | Boolean| lSelect|
|00002210| 2c 20 52 65 63 74 20 2a | 6c 52 65 63 74 2c 20 43 |, Rect *|lRect, C|
|00002220| 65 6c 6c 20 6c 43 65 6c | 6c 2c 0d 09 73 68 6f 72 |ell lCel|l,..shor|
|00002230| 74 20 6c 44 61 74 61 4f | 66 66 73 65 74 2c 20 73 |t lDataO|ffset, s|
|00002240| 68 6f 72 74 20 6c 44 61 | 74 61 4c 65 6e 2c 20 4c |hort lDa|taLen, L|
|00002250| 69 73 74 48 61 6e 64 6c | 65 20 6c 48 61 6e 64 6c |istHandl|e lHandl|
|00002260| 65 29 0d 7b 09 0d 09 63 | 68 61 72 20 2a 63 65 6c |e).{...c|har *cel|
|00002270| 6c 44 61 74 61 50 74 72 | 3b 0d 09 54 57 69 6e 64 |lDataPtr|;..TWind|
|00002280| 6f 77 4b 69 6e 64 20 6b | 69 6e 64 3b 0d 09 42 6f |owKind k|ind;..Bo|
|00002290| 6f 6c 65 61 6e 20 73 65 | 6c 65 63 74 65 64 3b 0d |olean se|lected;.|
|000022a0| 09 0d 09 69 66 20 28 6c | 4d 65 73 73 61 67 65 20 |...if (l|Message |
|000022b0| 21 3d 20 6c 44 72 61 77 | 4d 73 67 20 26 26 20 6c |!= lDraw|Msg && l|
|000022c0| 4d 65 73 73 61 67 65 20 | 21 3d 20 6c 48 69 6c 69 |Message |!= lHili|
|000022d0| 74 65 4d 73 67 29 20 72 | 65 74 75 72 6e 3b 0d 09 |teMsg) r|eturn;..|
|000022e0| 0d 09 73 65 6c 65 63 74 | 65 64 20 3d 20 28 28 2a |..select|ed = ((*|
|000022f0| 2a 6c 48 61 6e 64 6c 65 | 29 2e 63 65 6c 6c 41 72 |*lHandle|).cellAr|
|00002300| 72 61 79 29 5b 6c 43 65 | 6c 6c 2e 76 5d 20 3c 20 |ray)[lCe|ll.v] < |
|00002310| 30 3b 0d 09 67 52 65 63 | 74 20 3d 20 2a 6c 52 65 |0;..gRec|t = *lRe|
|00002320| 63 74 3b 0d 09 67 52 6f | 77 20 3d 20 6c 43 65 6c |ct;..gRo|w = lCel|
|00002330| 6c 2e 76 3b 0d 09 67 54 | 68 65 4c 69 73 74 20 3d |l.v;..gT|heList =|
|00002340| 20 6c 48 61 6e 64 6c 65 | 3b 0d 09 67 52 69 67 68 | lHandle|;..gRigh|
|00002350| 74 45 64 67 65 20 3d 20 | 67 52 65 63 74 2e 72 69 |tEdge = |gRect.ri|
|00002360| 67 68 74 20 2d 20 28 2a | 2a 6c 48 61 6e 64 6c 65 |ght - (*|*lHandle|
|00002370| 29 2e 69 6e 64 65 6e 74 | 2e 68 3b 0d 09 0d 09 69 |).indent|.h;....i|
|00002380| 66 20 28 6c 4d 65 73 73 | 61 67 65 20 3d 3d 20 6c |f (lMess|age == l|
|00002390| 48 69 6c 69 74 65 4d 73 | 67 20 26 26 20 28 2a 2a |HiliteMs|g && (**|
|000023a0| 67 54 68 65 4c 69 73 74 | 29 2e 6c 41 63 74 69 76 |gTheList|).lActiv|
|000023b0| 65 20 26 26 20 0d 09 09 | 28 28 57 69 6e 64 6f 77 |e && ...|((Window|
|000023c0| 50 65 65 6b 29 71 64 2e | 74 68 65 50 6f 72 74 29 |Peek)qd.|thePort)|
|000023d0| 2d 3e 68 69 6c 69 74 65 | 64 29 0d 09 7b 0d 09 09 |->hilite|d)..{...|
|000023e0| 67 45 72 61 73 65 52 65 | 63 74 20 3d 20 67 52 65 |gEraseRe|ct = gRe|
|000023f0| 63 74 3b 0d 09 09 48 69 | 6c 69 74 65 43 65 6c 6c |ct;...Hi|liteCell|
|00002400| 28 29 3b 0d 09 09 72 65 | 74 75 72 6e 3b 0d 09 7d |();...re|turn;..}|
|00002410| 0d 09 20 20 0d 09 28 2a | 2a 6c 48 61 6e 64 6c 65 |..  ..(*|*lHandle|
|00002420| 29 2e 70 6f 72 74 2d 3e | 74 78 46 61 63 65 20 3d |).port->|txFace =|
|00002430| 20 30 3b 0d 09 47 65 74 | 46 6f 6e 74 49 6e 66 6f | 0;..Get|FontInfo|
|00002440| 28 26 67 46 6f 6e 74 49 | 6e 66 6f 29 3b 0d 09 67 |(&gFontI|nfo);..g|
|00002450| 48 20 3d 20 6c 52 65 63 | 74 2d 3e 6c 65 66 74 20 |H = lRec|t->left |
|00002460| 2b 20 28 2a 2a 6c 48 61 | 6e 64 6c 65 29 2e 69 6e |+ (**lHa|ndle).in|
|00002470| 64 65 6e 74 2e 68 3b 0d | 09 67 56 20 3d 20 6c 52 |dent.h;.|.gV = lR|
|00002480| 65 63 74 2d 3e 74 6f 70 | 20 2b 20 67 46 6f 6e 74 |ect->top| + gFont|
|00002490| 49 6e 66 6f 2e 61 73 63 | 65 6e 74 3b 0d 09 67 49 |Info.asc|ent;..gI|
|000024a0| 6e 66 6f 20 3d 20 28 54 | 57 69 6e 64 6f 77 2a 2a |nfo = (T|Window**|
|000024b0| 29 47 65 74 57 52 65 66 | 43 6f 6e 28 28 57 69 6e |)GetWRef|Con((Win|
|000024c0| 64 6f 77 50 74 72 29 28 | 2a 2a 6c 48 61 6e 64 6c |dowPtr)(|**lHandl|
|000024d0| 65 29 2e 70 6f 72 74 29 | 3b 0d 09 6b 69 6e 64 20 |e).port)|;..kind |
|000024e0| 3d 20 28 2a 2a 67 49 6e | 66 6f 29 2e 6b 69 6e 64 |= (**gIn|fo).kind|
|000024f0| 3b 0d 09 69 66 20 28 6b | 69 6e 64 20 3d 3d 20 6b |;..if (k|ind == k|
|00002500| 53 75 62 6a 65 63 74 29 | 20 7b 0d 09 09 67 53 74 |Subject)| {...gSt|
|00002510| 72 69 6e 67 73 20 3d 20 | 28 2a 2a 67 49 6e 66 6f |rings = |(**gInfo|
|00002520| 29 2e 73 74 72 69 6e 67 | 73 3b 0d 09 7d 20 65 6c |).string|s;..} el|
|00002530| 73 65 20 7b 0d 09 09 67 | 53 74 72 69 6e 67 73 20 |se {...g|Strings |
|00002540| 3d 20 67 47 72 6f 75 70 | 4e 61 6d 65 73 3b 0d 09 |= gGroup|Names;..|
|00002550| 7d 0d 09 63 65 6c 6c 44 | 61 74 61 50 74 72 20 3d |}..cellD|ataPtr =|
|00002560| 20 2a 28 2a 2a 6c 48 61 | 6e 64 6c 65 29 2e 63 65 | *(**lHa|ndle).ce|
|00002570| 6c 6c 73 20 2b 20 6c 44 | 61 74 61 4f 66 66 73 65 |lls + lD|ataOffse|
|00002580| 74 3b 0d 09 67 49 6e 64 | 65 78 20 3d 20 2a 28 75 |t;..gInd|ex = *(u|
|00002590| 6e 73 69 67 6e 65 64 20 | 73 68 6f 72 74 2a 29 63 |nsigned |short*)c|
|000025a0| 65 6c 6c 44 61 74 61 50 | 74 72 3b 0d 09 0d 09 73 |ellDataP|tr;....s|
|000025b0| 77 69 74 63 68 20 28 6b | 69 6e 64 29 20 7b 0d 09 |witch (k|ind) {..|
|000025c0| 09 63 61 73 65 20 6b 47 | 72 6f 75 70 3a 0d 09 09 |.case kG|roup:...|
|000025d0| 09 73 77 69 74 63 68 20 | 28 28 2a 2a 67 49 6e 66 |.switch |((**gInf|
|000025e0| 6f 29 2e 67 72 6f 75 70 | 4b 69 6e 64 29 20 7b 0d |o).group|Kind) {.|
|000025f0| 09 09 09 09 63 61 73 65 | 20 6b 46 75 6c 6c 47 72 |....case| kFullGr|
|00002600| 6f 75 70 3a 0d 09 09 09 | 09 63 61 73 65 20 6b 4e |oup:....|.case kN|
|00002610| 65 77 47 72 6f 75 70 3a | 0d 09 09 09 09 09 44 72 |ewGroup:|......Dr|
|00002620| 61 77 46 75 6c 6c 4f 72 | 4e 65 77 47 72 6f 75 70 |awFullOr|NewGroup|
|00002630| 43 65 6c 6c 28 29 3b 0d | 09 09 09 09 09 62 72 65 |Cell();.|.....bre|
|00002640| 61 6b 3b 0d 09 09 09 09 | 63 61 73 65 20 6b 55 73 |ak;.....|case kUs|
|00002650| 65 72 47 72 6f 75 70 3a | 0d 09 09 09 09 09 44 72 |erGroup:|......Dr|
|00002660| 61 77 55 73 65 72 47 72 | 6f 75 70 43 65 6c 6c 28 |awUserGr|oupCell(|
|00002670| 29 3b 0d 09 09 09 09 09 | 62 72 65 61 6b 3b 0d 09 |);......|break;..|
|00002680| 09 09 7d 0d 09 09 09 62 | 72 65 61 6b 3b 0d 09 09 |..}....b|reak;...|
|00002690| 63 61 73 65 20 6b 53 75 | 62 6a 65 63 74 3a 0d 09 |case kSu|bject:..|
|000026a0| 09 09 44 72 61 77 53 75 | 62 6a 65 63 74 43 65 6c |..DrawSu|bjectCel|
|000026b0| 6c 28 29 3b 0d 09 09 09 | 62 72 65 61 6b 3b 0d 09 |l();....|break;..|
|000026c0| 7d 0d 0d 09 69 66 20 28 | 73 65 6c 65 63 74 65 64 |}...if (|selected|
|000026d0| 29 20 48 69 6c 69 74 65 | 43 65 6c 6c 28 29 3b 0d |) Hilite|Cell();.|
|000026e0| 7d 0d 0d 0d 0d 2f 2a 2d | 2d 2d 2d 2d 2d 2d 2d 2d |}..../*-|--------|
|000026f0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002700| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002710| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002720| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002730| 2d 2d 2d 0d 09 6c 64 65 | 66 5f 49 6e 69 74 55 50 |---..lde|f_InitUP|
|00002740| 50 0d 09 0d 09 49 6e 69 | 74 69 61 6c 69 7a 65 20 |P....Ini|tialize |
|00002750| 55 50 50 73 2e 0d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |UPPs..--|--------|
|00002760| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002770| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002780| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00002790| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000027a0| 2d 2d 2a 2f 0d 0d 76 6f | 69 64 20 6c 64 65 66 5f |--*/..vo|id ldef_|
|000027b0| 49 6e 69 74 55 50 50 20 | 28 76 6f 69 64 29 0d 7b |InitUPP |(void).{|
|000027c0| 0d 09 67 4c 69 73 74 44 | 65 66 46 75 6e 63 55 50 |..gListD|efFuncUP|
|000027d0| 50 20 3d 20 4e 65 77 4c | 69 73 74 44 65 66 50 72 |P = NewL|istDefPr|
|000027e0| 6f 63 28 4c 69 73 74 44 | 65 66 46 75 6e 63 29 3b |oc(ListD|efFunc);|
|000027f0| 0d 7d 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.}......|........|
|00002800| 00 00 01 00 00 00 01 54 | 00 00 00 54 00 00 00 46 |.......T|...T...F|
|00002810| 00 00 00 00 8d 00 00 30 | 0a 00 00 00 32 00 02 00 |.......0|....2...|
|00002820| 00 00 00 00 57 01 68 00 | 6b 01 a4 04 02 4f 4b 00 |....W.h.|k....OK.|
|00002830| 06 6c 64 65 66 2e 63 b4 | 02 00 00 00 54 45 58 54 |.ldef.c.|....TEXT|
|00002840| 4d 4d 43 43 01 00 ff ff | ff ff 00 00 00 00 12 a4 |MMCC....|........|
|00002850| 00 00 54 45 58 54 4d 4d | 43 43 01 00 ff ff ff ff |..TEXTMM|CC......|
|00002860| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002870| 00 00 aa 4f 8a 39 00 00 | 27 73 00 00 01 9a 4a 01 |...O.9..|'s....J.|
|00002880| a4 88 02 5e 30 00 00 00 | 18 00 46 00 28 00 bb 01 |...^0...|..F.(...|
|00002890| d6 00 01 00 00 00 00 00 | 00 00 00 00 8e 00 00 30 |........|.......0|
|000028a0| 0a 00 00 00 b8 00 81 00 | 00 00 00 00 00 00 00 ff |........|........|
|000028b0| ff 80 00 04 46 69 6c 65 | 10 4e 65 77 20 47 72 6f |....File|.New Gro|
|000028c0| 75 70 20 57 69 6e 64 6f | 77 00 00 00 00 07 4f 70 |up Windo|w.....Op|
|000028d0| 65 6e 2e 2e 2e 00 4f 00 | 00 05 43 6c 6f 73 65 00 |en....O.|..Close.|
|000028e0| 57 00 00 01 2d 00 00 00 | 00 04 53 61 76 65 00 53 |W...-...|..Save.S|
|000028f0| 00 00 0a 53 61 76 65 20 | 41 73 2e 2e 2e 00 00 00 |...Save |As......|
|00002900| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00002910| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002920| 00 00 00 00 00 00 00 03 | 00 04 00 56 00 04 01 b5 |........|...V....|
|00002930| 02 7c 00 56 00 04 01 b5 | 02 7c ac 04 98 dc 00 00 |.|.V....|.|......|
|00002940| 01 9c 00 00 01 fa 00 00 | 00 00 01 00 00 00 00 04 |........|........|
|00002950| 00 01 00 01 00 00 01 00 | 00 00 01 54 00 00 00 54 |........|...T...T|
|00002960| 00 00 00 46 01 20 49 68 | 1a 72 00 00 00 1c 00 46 |...F. Ih|.r.....F|
|00002970| 00 01 4d 50 53 52 00 00 | 00 12 4d 57 42 42 00 00 |..MPSR..|..MWBB..|
|00002980| 00 1e 03 ed ff ff 00 00 | 00 00 00 00 00 00 03 f0 |........|........|
|00002990| ff ff 00 00 00 4c 00 00 | 00 00 00 00 00 00 00 00 |.....L..|........|
|000029a0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000029f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+